home *** CD-ROM | disk | FTP | other *** search
/ Interactive Media Design Review 1999 / Interactive Media Design Review 1999.iso / pc / allfiles / angry / scene3_4.dir / 00004_scene4Loop.ls < prev    next >
Encoding:
Text File  |  1999-03-01  |  1007 b   |  40 lines
  1. global rollSprite, gScene4Done
  2.  
  3. on enterFrame
  4.   rollSprite = the rollOver
  5.   case rollSprite of
  6.     8:
  7.       if gScene4Done = #loriBook then
  8.         cursor([member("pointy").memberNum, member("pointy_mask").memberNum])
  9.         go("loriRaiseBook")
  10.       else
  11.         go("LoriBook")
  12.       end if
  13.     5:
  14.       cursor([member("pointy").memberNum, member("pointy_mask").memberNum])
  15.       set the member of sprite 4 to member("hyperKidLOOP")
  16.       puppetSprite(7, 1)
  17.       sprite(7).visible = 1
  18.       set the member of sprite 7 to member("loriLook")
  19.     otherwise:
  20.       cursor(-1)
  21.   end case
  22.   if not rollOver(5) then
  23.     set the member of sprite 4 to member("kid00")
  24.     puppetSprite(7, 0)
  25.     sprite(7).visible = 0
  26.   end if
  27.   if (the lastEvent > (5 * 60)) and (gScene4Done = []) then
  28.     set the member of sprite 4 to member("hyperKidLOOP")
  29.     puppetSprite(7, 1)
  30.     sprite(7).visible = 1
  31.     set the member of sprite 7 to member("loriLook")
  32.   else
  33.     nothing()
  34.   end if
  35. end
  36.  
  37. on exitFrame
  38.   go(the frame)
  39. end
  40.